program facto_rial;

var factorial ,n, i : int64;

BEGIN
	write('n = '); readln(n);
	factorial:=1;
	for i:=2 to n do
	factorial:=factorial*i;
	writeln(factorial); 
END.

